100 POKE53280, 0:POKE53281, 0:PRINT"[147]";
101 PRINT"[155][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]"
102 PRINT"[152]    [204][207][193][196][211][212][193][210] [208][210][197][211][197][206][212][211]     "
103 PRINT"[151][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]"
104 PRINT"[172]                    [146][187]"
105 PRINT"                      "
106 PRINT"  decimal[160]data[160]maker  "
107 PRINT"[163][163][163][163][163][163][163][163][163][160]                     [146][163][163][163][163][163][163][163][163][163][160]        bY     ";
108 PRINT"     [160]"
109 PRINT"[163][163][163][163][163][163][163][163][163]                      [146][163][163][163][163][163][163][163][163][163]    dAVID pANKUR";
110 PRINT"ST   [160]"
111 PRINT"[163][163][163][163][163][163][163][163][163]                     [160][146][163][163][163][163][163][163][163][163][163]                ";
112 PRINT"      "
113 PRINT"[188]                    [146][190]"
114 PRINT"[155][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]"
115 PRINT"[152] press space[160]to[160]continue  "
116 PRINT"[151][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]"
120 GETA$:IFA$<>" "THEN120
200 POKE53280, 0:POKE53281, 0:PRINT"[147]";
204 PRINT"[206][207][212][201][195][197]:[155][207]NCE[158][196]ATAMAKER [196]EC[155]IS"
205 PRINT"ACTIVATEDYOUWILLHAVETO"
206 PRINT"REBOOT[158]loadstar[155]TORETURN"
207 PRINT"TOTHEMENUSYSTEM."
208 PRINT"[154][196]OYOUWANTTOCONTINUE? ([217]/[206])"
210 GETA$:IFA$="[217]"ORA$="Y"THEN300
230 IFA$="[206]"ORA$="N"THEN400
250 GOTO 210
300 PRINT"[147]":LOAD"DATAMAKER D",8
400 OPEN15,8,15,"R0:ONE-SCREEN WINNERS=ONE-SCREEN WINNERS":INPUT#15,ER:CLOSE15
401 IFER<>63 THEN PRINT"[147]":END
405 PRINT"[147][144]LOAD"CHR$(34)"ONE-SCREEN WINNERS"CHR$(34)",8"
410 PRINT"RUN"
420 POKE631,13:POKE632,13:POKE198,2:END